/ Risc World 3 / Risc World 3.iso / SOFTWARE / ISSUE3 / MAKEHTML / !MakeHTML / WIMPheap

< prev

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 10 f4 20 3e 20 | 57 49 4d 50 68 65 61 70 |..... > |WIMPheap|
|00000010| 0d 00 14 35 f4 20 70 72 | 6f 76 69 64 65 73 20 61 |...5. pr|ovides a|
|00000020| 20 68 65 61 70 20 61 62 | 6f 76 65 20 74 68 65 20 | heap ab|ove the |
|00000030| 42 41 53 49 43 20 77 6f | 72 6b 73 70 61 63 65 20 |BASIC wo|rkspace |
|00000040| 77 68 69 63 68 0d 00 1e | 28 f4 20 65 78 74 65 6e |which...|(. exten|
|00000050| 64 73 20 61 6e 64 20 63 | 6f 6e 74 72 61 63 74 73 |ds and c|ontracts|
|00000060| 20 61 73 20 6e 65 63 65 | 73 73 61 72 79 0d 00 28 | as nece|ssary..(|
|00000070| 14 f4 20 62 79 20 42 65 | 6e 20 53 75 6d 6d 65 72 |.. by Be|n Summer|
|00000080| 73 0d 00 32 04 0d 00 3c | 19 dd f2 77 69 6d 70 68 |s..2...<|...wimph|
|00000090| 65 61 70 5f 69 6e 69 74 | 69 61 6c 69 73 65 0d 00 |eap_init|ialise..|
|000000a0| 46 0a 20 20 ea 20 74 25 | 0d 00 50 2c 20 20 c8 99 |F.  . t%|..P,  ..|
|000000b0| 20 22 4f 53 5f 52 65 61 | 64 4d 65 6d 4d 61 70 49 | "OS_Rea|dMemMapI|
|000000c0| 6e 66 6f 22 20 b8 20 5f | 77 68 5f 70 61 67 65 73 |nfo" . _|wh_pages|
|000000d0| 69 7a 65 25 0d 00 5a 23 | 20 20 5f 77 68 5f 68 65 |ize%..Z#|  _wh_he|
|000000e0| 61 70 73 69 7a 65 25 20 | 3d 20 5f 77 68 5f 70 61 |apsize% |= _wh_pa|
|000000f0| 67 65 73 69 7a 65 25 0d | 00 64 23 20 20 c8 99 20 |gesize%.|.d#  .. |
|00000100| 22 57 69 6d 70 5f 53 6c | 6f 74 53 69 7a 65 22 2c |"Wimp_Sl|otSize",|
|00000110| 2d 31 2c 2d 31 20 b8 20 | 74 25 0d 00 6e 1f 20 20 |-1,-1 . |t%..n.  |
|00000120| 5f 77 68 5f 68 65 61 70 | 6c 6f 63 25 20 3d 20 74 |_wh_heap|loc% = t|
|00000130| 25 20 2b 20 26 38 30 30 | 30 0d 00 78 40 20 20 c8 |% + &800|0..x@  .|
|00000140| 99 20 22 57 69 6d 70 5f | 53 6c 6f 74 53 69 7a 65 |. "Wimp_|SlotSize|
|00000150| 22 2c 5f 77 68 5f 68 65 | 61 70 6c 6f 63 25 20 2b |",_wh_he|aploc% +|
|00000160| 20 5f 77 68 5f 68 65 61 | 70 73 69 7a 65 25 20 2d | _wh_hea|psize% -|
|00000170| 20 26 38 30 30 30 2c 2d | 31 0d 00 82 30 20 20 c8 | &8000,-|1...0  .|
|00000180| 99 20 22 4f 53 5f 48 65 | 61 70 22 2c 30 2c 5f 77 |. "OS_He|ap",0,_w|
|00000190| 68 5f 68 65 61 70 6c 6f | 63 25 2c 2c 5f 77 68 5f |h_heaplo|c%,,_wh_|
|000001a0| 68 65 61 70 73 69 7a 65 | 25 0d 00 8c 05 e1 0d 00 |heapsize|%.......|
|000001b0| 96 04 0d 00 a0 1b dd a4 | 77 69 6d 70 68 65 61 70 |........|wimpheap|
|000001c0| 5f 63 6c 61 69 6d 28 73 | 69 7a 65 25 29 0d 00 aa |_claim(s|ize%)...|
|000001d0| 1a f2 77 69 6d 70 68 65 | 61 70 5f 63 6c 61 69 6d |..wimphe|ap_claim|
|000001e0| 28 73 69 7a 65 25 29 0d | 00 b4 0e 3d 74 65 6d 70 |(size%).|...=temp|
|000001f0| 68 65 61 70 25 0d 00 be | 04 0d 00 c8 1b dd f2 77 |heap%...|.......w|
|00000200| 69 6d 70 68 65 61 70 5f | 63 6c 61 69 6d 28 73 69 |impheap_|claim(si|
|00000210| 7a 65 25 29 0d 00 d2 08 | ea 20 61 25 0d 00 dc 07 |ze%)....|. a%....|
|00000220| ea 20 85 0d 00 e6 a3 ee | 20 85 20 ea 20 f7 20 85 |. ......| . . . .|
|00000230| 3a 85 20 31 3c 3c 33 31 | 2c 22 44 72 61 77 57 6f |:. 1<<31|,"DrawWo|
|00000240| 72 6b 73 20 63 61 6e 6e | 6f 74 20 63 6c 61 69 6d |rks cann|ot claim|
|00000250| 20 65 6e 6f 75 67 68 20 | 66 72 65 65 20 6d 65 6d | enough |free mem|
|00000260| 6f 72 79 20 74 6f 20 70 | 65 72 66 6f 72 6d 20 74 |ory to p|erform t|
|00000270| 68 69 73 20 61 63 74 69 | 6f 6e 2e 20 53 65 65 20 |his acti|on. See |
|00000280| 74 68 65 20 52 69 73 63 | 20 4f 53 20 75 73 65 72 |the Risc| OS user|
|00000290| 20 67 75 69 64 65 20 66 | 6f 72 20 73 75 67 67 65 | guide f|or sugge|
|000002a0| 73 74 69 6f 6e 73 20 6f | 6e 20 68 6f 77 20 74 6f |stions o|n how to|
|000002b0| 20 66 72 65 65 20 75 70 | 20 6d 6f 72 65 20 6d 65 | free up| more me|
|000002c0| 6d 6f 72 79 2e 22 0d 00 | f0 2e c8 99 20 22 58 4f |mory."..|.... "XO|
|000002d0| 53 5f 48 65 61 70 22 2c | 32 2c 5f 77 68 5f 68 65 |S_Heap",|2,_wh_he|
|000002e0| 61 70 6c 6f 63 25 2c 2c | 73 69 7a 65 25 20 b8 20 |aploc%,,|size% . |
|000002f0| 2c 2c 61 25 0d 00 fa 1e | e7 20 61 25 20 3c 3e 20 |,,a%....|. a% <> |
|00000300| 30 20 8c 20 74 65 6d 70 | 68 65 61 70 25 3d 61 25 |0 . temp|heap%=a%|
|00000310| 3a e1 0d 01 04 2b e7 20 | a4 5f 77 69 6d 70 68 65 |:....+. |._wimphe|
|00000320| 61 70 5f 65 78 74 65 6e | 64 68 65 61 70 28 73 69 |ap_exten|dheap(si|
|00000330| 7a 65 25 29 20 3d 20 a3 | 20 8c 20 3d 30 0d 01 0e |ze%) = .| . =0...|
|00000340| 2e c8 99 20 22 58 4f 53 | 5f 48 65 61 70 22 2c 32 |... "XOS|_Heap",2|
|00000350| 2c 5f 77 68 5f 68 65 61 | 70 6c 6f 63 25 2c 2c 73 |,_wh_hea|ploc%,,s|
|00000360| 69 7a 65 25 20 b8 20 2c | 2c 61 25 0d 01 18 15 f2 |ize% . ,|,a%.....|
|00000370| 5f 77 69 6d 70 68 65 61 | 70 5f 73 68 72 69 6e 6b |_wimphea|p_shrink|
|00000380| 0d 01 22 10 74 65 6d 70 | 68 65 61 70 25 3d 61 25 |..".temp|heap%=a%|
|00000390| 0d 01 2c 07 f7 20 85 0d | 01 36 05 e1 0d 01 40 04 |..,.. ..|.6....@.|
|000003a0| 0d 01 4a 26 dd a4 77 69 | 6d 70 68 65 61 70 5f 65 |..J&..wi|mpheap_e|
|000003b0| 78 74 65 6e 64 28 62 6c | 6f 63 6b 25 2c 20 63 68 |xtend(bl|ock%, ch|
|000003c0| 61 6e 67 65 25 29 0d 01 | 54 10 20 20 ea 20 6e 25 |ange%)..|T.  . n%|
|000003d0| 2c 66 25 2c 74 25 0d 01 | 5e 3c 20 20 c8 99 20 22 |,f%,t%..|^<  .. "|
|000003e0| 58 4f 53 5f 48 65 61 70 | 22 2c 34 2c 5f 77 68 5f |XOS_Heap|",4,_wh_|
|000003f0| 68 65 61 70 6c 6f 63 25 | 2c 62 6c 6f 63 6b 25 2c |heaploc%|,block%,|
|00000400| 63 68 61 6e 67 65 25 20 | b8 20 2c 2c 6e 25 20 3b |change% |. ,,n% ;|
|00000410| 66 25 0d 01 68 19 20 20 | e7 28 66 25 20 80 20 31 |f%..h.  |.(f% . 1|
|00000420| 29 20 3d 20 30 20 8c 20 | 3d 6e 25 0d 01 72 30 20 |) = 0 . |=n%..r0 |
|00000430| 20 c8 99 20 22 4f 53 5f | 48 65 61 70 22 2c 36 2c | .. "OS_|Heap",6,|
|00000440| 5f 77 68 5f 68 65 61 70 | 6c 6f 63 25 2c 62 6c 6f |_wh_heap|loc%,blo|
|00000450| 63 6b 25 20 b8 20 2c 2c | 2c 74 25 0d 01 7c 32 20 |ck% . ,,|,t%..|2 |
|00000460| 20 e7 20 a4 5f 77 69 6d | 70 68 65 61 70 5f 65 78 | . ._wim|pheap_ex|
|00000470| 74 65 6e 64 68 65 61 70 | 28 74 25 2b 63 68 61 6e |tendheap|(t%+chan|
|00000480| 67 65 25 29 20 3d 20 a3 | 20 8c 20 3d 30 0d 01 86 |ge%) = .| . =0...|
|00000490| 3c 20 20 c8 99 20 22 58 | 4f 53 5f 48 65 61 70 22 |<  .. "X|OS_Heap"|
|000004a0| 2c 34 2c 5f 77 68 5f 68 | 65 61 70 6c 6f 63 25 2c |,4,_wh_h|eaploc%,|
|000004b0| 62 6c 6f 63 6b 25 2c 63 | 68 61 6e 67 65 25 20 b8 |block%,c|hange% .|
|000004c0| 20 2c 2c 6e 25 20 3b 66 | 25 0d 01 90 19 20 20 e7 | ,,n% ;f|%....  .|
|000004d0| 28 66 25 20 80 20 31 29 | 20 3d 20 30 20 8c 20 3d |(f% . 1)| = 0 . =|
|000004e0| 6e 25 0d 01 9a 06 3d 30 | 0d 01 a4 04 0d 01 ae 1b |n%....=0|........|
|000004f0| dd a4 77 69 6d 70 68 65 | 61 70 5f 66 72 65 65 28 |..wimphe|ap_free(|
|00000500| 62 6c 6f 63 6b 25 29 0d | 01 b8 14 ea 20 85 3a ee |block%).|.... .:.|
|00000510| 20 85 20 ea 20 f7 20 85 | 3a 3d 30 0d 01 c2 15 20 | . . . .|:=0.... |
|00000520| 20 e7 20 62 6c 6f 63 6b | 25 3d 30 20 8c 20 3d 30 | . block|%=0 . =0|
|00000530| 0d 01 cc 28 20 20 c8 99 | 20 22 4f 53 5f 48 65 61 |...(  ..| "OS_Hea|
|00000540| 70 22 2c 33 2c 5f 77 68 | 5f 68 65 61 70 6c 6f 63 |p",3,_wh|_heaploc|
|00000550| 25 2c 62 6c 6f 63 6b 25 | 0d 01 d6 17 20 20 f2 5f |%,block%|....  ._|
|00000560| 77 69 6d 70 68 65 61 70 | 5f 73 68 72 69 6e 6b 0d |wimpheap|_shrink.|
|00000570| 01 e0 08 20 f7 20 85 0d | 01 ea 06 3d 30 0d 01 f4 |... . ..|...=0...|
|00000580| 04 0d 01 fe 21 dd a4 5f | 77 69 6d 70 68 65 61 70 |....!.._|wimpheap|
|00000590| 5f 65 78 74 65 6e 64 68 | 65 61 70 28 73 69 7a 65 |_extendh|eap(size|
|000005a0| 25 29 0d 02 08 0d 20 20 | ea 20 73 25 2c 66 25 0d |%)....  |. s%,f%.|
|000005b0| 02 12 34 20 20 73 25 20 | 3d 20 a4 5f 77 69 6d 70 |..4  s% |= ._wimp|
|000005c0| 68 65 61 70 5f 72 6f 75 | 6e 64 75 70 28 5f 77 68 |heap_rou|ndup(_wh|
|000005d0| 5f 68 65 61 70 73 69 7a | 65 25 20 2b 20 73 69 7a |_heapsiz|e% + siz|
|000005e0| 65 25 29 0d 02 1c 3c 20 | 20 c8 99 20 22 58 57 69 |e%)...< | .. "XWi|
|000005f0| 6d 70 5f 53 6c 6f 74 53 | 69 7a 65 22 2c 5f 77 68 |mp_SlotS|ize",_wh|
|00000600| 5f 68 65 61 70 6c 6f 63 | 25 20 2b 20 73 25 20 2d |_heaploc|% + s% -|
|00000610| 20 26 38 30 30 30 2c 2d | 31 20 b8 20 3b 66 25 0d | &8000,-|1 . ;f%.|
|00000620| 02 26 18 20 20 e7 28 66 | 25 20 80 20 31 29 20 3d |.&.  .(f|% . 1) =|
|00000630| 20 31 20 8c 20 3d a3 0d | 02 30 35 20 20 c8 99 20 | 1 . =..|.05  .. |
|00000640| 22 4f 53 5f 48 65 61 70 | 22 2c 35 2c 5f 77 68 5f |"OS_Heap|",5,_wh_|
|00000650| 68 65 61 70 6c 6f 63 25 | 2c 2c 73 25 20 2d 20 5f |heaploc%|,,s% - _|
|00000660| 77 68 5f 68 65 61 70 73 | 69 7a 65 25 0d 02 3a 18 |wh_heaps|ize%..:.|
|00000670| 20 20 5f 77 68 5f 68 65 | 61 70 73 69 7a 65 25 20 |  _wh_he|apsize% |
|00000680| 3d 20 73 25 0d 02 44 06 | 3d b9 0d 02 4e 04 0d 02 |= s%..D.|=...N...|
|00000690| 58 16 dd f2 5f 77 69 6d | 70 68 65 61 70 5f 73 68 |X..._wim|pheap_sh|
|000006a0| 72 69 6e 6b 0d 02 62 0d | 20 20 ea 20 73 25 2c 74 |rink..b.|  . s%,t|
|000006b0| 25 0d 02 6c 18 20 20 73 | 25 20 3d 20 5f 77 68 5f |%..l.  s|% = _wh_|
|000006c0| 68 65 61 70 73 69 7a 65 | 25 0d 02 76 2f 20 20 c8 |heapsize|%..v/  .|
|000006d0| 99 20 22 58 4f 53 5f 48 | 65 61 70 22 2c 35 2c 5f |. "XOS_H|eap",5,_|
|000006e0| 77 68 5f 68 65 61 70 6c | 6f 63 25 2c 2c 2d 73 25 |wh_heapl|oc%,,-s%|
|000006f0| 20 b8 20 2c 2c 2c 74 25 | 0d 02 80 1a 20 20 e7 20 | . ,,,t%|....  . |
|00000700| 74 25 20 3d 20 2d 73 25 | 20 8c 20 74 25 20 3d 20 |t% = -s%| . t% = |
|00000710| 73 25 0d 02 8a 3c 20 20 | 5f 77 68 5f 68 65 61 70 |s%...<  |_wh_heap|
|00000720| 73 69 7a 65 25 20 3d 20 | a4 5f 77 69 6d 70 68 65 |size% = |._wimphe|
|00000730| 61 70 5f 72 6f 75 6e 64 | 75 70 28 5f 77 68 5f 68 |ap_round|up(_wh_h|
|00000740| 65 61 70 73 69 7a 65 25 | 20 2d 20 74 25 29 0d 02 |eapsize%| - t%)..|
|00000750| 94 3d 20 20 c8 99 20 22 | 58 4f 53 5f 48 65 61 70 |.=  .. "|XOS_Heap|
|00000760| 22 2c 35 2c 5f 77 68 5f | 68 65 61 70 6c 6f 63 25 |",5,_wh_|heaploc%|
|00000770| 2c 2c 5f 77 68 5f 68 65 | 61 70 73 69 7a 65 25 20 |,,_wh_he|apsize% |
|00000780| 2d 20 28 73 25 20 2d 20 | 74 25 29 0d 02 9e 40 20 |- (s% - |t%)...@ |
|00000790| 20 c8 99 20 22 57 69 6d | 70 5f 53 6c 6f 74 53 69 | .. "Wim|p_SlotSi|
|000007a0| 7a 65 22 2c 5f 77 68 5f | 68 65 61 70 6c 6f 63 25 |ze",_wh_|heaploc%|
|000007b0| 20 2b 20 5f 77 68 5f 68 | 65 61 70 73 69 7a 65 25 | + _wh_h|eapsize%|
|000007c0| 20 2d 20 26 38 30 30 30 | 2c 2d 31 0d 02 a8 05 e1 | - &8000|,-1.....|
|000007d0| 0d 02 b2 04 0d 02 bc 1b | dd a4 5f 77 69 6d 70 68 |........|.._wimph|
|000007e0| 65 61 70 5f 72 6f 75 6e | 64 75 70 28 73 25 29 0d |eap_roun|dup(s%).|
|000007f0| 02 c6 0a 20 20 ea 20 74 | 25 0d 02 d0 22 20 20 e7 |...  . t|%..."  .|
|00000800| 28 73 25 20 83 20 5f 77 | 68 5f 70 61 67 65 73 69 |(s% . _w|h_pagesi|
|00000810| 7a 65 25 29 20 3c 3e 20 | 30 20 8c 0d 02 da 31 20 |ze%) <> |0 ....1 |
|00000820| 20 20 20 74 25 20 3d 20 | 5f 77 68 5f 70 61 67 65 |   t% = |_wh_page|
|00000830| 73 69 7a 65 25 20 2d 20 | 28 73 25 20 83 20 5f 77 |size% - |(s% . _w|
|00000840| 68 5f 70 61 67 65 73 69 | 7a 65 25 29 0d 02 e4 10 |h_pagesi|ze%)....|
|00000850| 20 20 20 20 73 25 20 2b | 3d 20 74 25 0d 02 ee 07 |    s% +|= t%....|
|00000860| 20 20 cd 0d 02 f8 07 3d | 73 25 0d 03 02 04 0d 03 |  .....=|s%......|
|00000870| 0c 1a dd a4 77 69 6d 70 | 68 65 61 70 5f 6c 61 72 |....wimp|heap_lar|
|00000880| 67 65 73 74 66 72 65 65 | 0d 03 16 0a 20 20 ea 20 |gestfree|....  . |
|00000890| 74 25 0d 03 20 28 20 20 | c8 99 20 22 4f 53 5f 48 |t%.. (  |.. "OS_H|
|000008a0| 65 61 70 22 2c 31 2c 5f | 77 68 5f 68 65 61 70 6c |eap",1,_|wh_heapl|
|000008b0| 6f 63 25 20 b8 20 2c 2c | 74 25 0d 03 2a 07 3d 74 |oc% . ,,|t%..*.=t|
|000008c0| 25 0d 03 34 04 0d 03 3e | 04 0d ff                |%..4...>|...     |
+--------+-------------------------+-------------------------+--------+--------+